perm filename HOARE[1,JRA] blob sn#005898 filedate 1972-08-24 generic text, type T, neo UTF8
00010	L(X1 X2) →LE(X1 X2);
00020	(LE(X1 X2) ∧LE(X2 X3)) →LE(X1 X3);
00035	(LE(X1 X2)∧LE(X2 X1))→E(X1 X2);
00050	(L(X1 X2) ∧ L(X2 X3)) →L(X1 X3);
00060	LE(X1 X2) →(E(X1 X2) ∨ L(X1 X2));
00080	;
00100	E(X1 X1); LE(X1 X1);
00200	
00300	LE(M F); LE(F N); LE(L P); LE(P F); LE(F Q); LE(Q CN);
00400	¬L(X1 X1); 
00500	(LE(L X1) ∧L(X1 M) ∧ LE(M X2) ∧ LE(X2 CN))→LE(A(X1) A(X2));
00600	(LE(L X1) ∧ LE(X1 N) ∧ L(N X2) ∧ LE(X2 CN)) → LE(A(X1) A(X2));
00700	¬L(M N);
00800	;
00900	LE(A(F)A(Q)); ;
01000